home *** CD-ROM | disk | FTP | other *** search
/ Mobiclic 71 / MOBICLIC 71.ISO / mac / DATA / COMMUN / temp0001 / 00262_Script_SORTIE_ENCADRE < prev    next >
Text File  |  2004-12-05  |  690b  |  31 lines
  1. on exitFrame
  2.   if the pauseState=0 then
  3.     case(soundBusy(3)) of
  4.       1:
  5.         go the frame
  6.       0:
  7.         niveauson()
  8.         temp = the windowlist.duplicate()
  9.         if temp <> [] then
  10.           N = count(temp)
  11.           repeat with i = 1 to N
  12.             nomfen = temp[i].name
  13.             if nomfen = "ENCADRE_TEMP"  then
  14.               window(nomfen).close()
  15.               window(nomfen).forget()
  16.               exit
  17.             end if
  18.           end repeat
  19.         end if
  20.     end case
  21.   end if
  22. end
  23. -------------------------------------
  24. on mouseUp
  25.   if testClic()=1 then
  26.     coupeson(3)
  27.     niveauson
  28.   end if
  29. end mouseUp
  30. -----------------------------
  31.